﻿Public Class Valor
    Public columna As String
    Public valor As String
    Public esTexto As Boolean

    Public Function getValorSql() As String
        If esTexto Then
            Return "'" & valor & "'"
        Else
            Return valor
        End If
    End Function
End Class
